home *** CD-ROM | disk | FTP | other *** search
- ;EasyPatch Installation Script
- ;$VER: EasyInstall 1.22
-
- (set iver (/ @installer-version 65536))
- (set irev (- @installer-version (* ver 65536)))
-
-
- (set #ver "1.23")
- (set #nver "123")
-
- (set #vc 0)
-
- ;/// ***** English
-
-
- (set #Welcome "Welcome to EasyPatch %s\nPrepare your requesters to be destroyed!")
-
- (set #Voice "-s180 Prepare your requesters to be destroyed!")
-
- (set #Voice_End "-s180 EasyPatch has been succesfuly installed.")
-
- (set #Voice_Upgrade "-s180 Upgrading to")
-
- (set #wrongOS "EasyPatch needs at least OS2.04 to run\n")
-
- (set #EasyPatchDir "Where I should install EasyPatch and his support utilities?\n(A directory will be created)\n")
-
- (set #EasyUtilDir "Where I should install the\nsupport utilities?\n")
-
- (set #GuideDir "Where I should install the\nAmigaGuide documentation?\n")
-
- (set #CpuChoice "Please, select your processor!\n")
-
- (set #CreateCpu "Creating 68%s version of EasyPatch")
-
- (set #Wait "Please wait\n")
-
- (set #Done "\nEasyPatch has been succesfuly installed in\n %s.\n\n")
-
- (set #Aminet "You are going to install the Aminet version of EasyPatch.\nYou can obtain the full version on EasyPatch homepage.")
-
- (set #BootUp "Should be EasyPatch automatically runned at bootup?")
-
- ;/// ***** Italiano
-
- (IF (= @language "italiano")
- (
-
- (set #Welcome "Benvenuto in EasyPatch %s\nPrepara i tuoi requesters ad essere distrutti!")
-
- (set #wrongOS "EasyPatch necessita del Sistema Operativo 2.04\n per funzionare.\n")
-
- (set #EasyPatchDir "Dove devo installare EasyPatch e le sue utility di supporto?\n (Una directory verra' creata)\n")
-
- (set #EasyUtilDir "Dove devo installare le utility\ndi supporto?\n")
-
- (set #GuideDir "Dove devo installare la \ndocumentazione AmigaGuide?\n\n")
-
- (set #CpuChoice "Seleziona il tuo processore\n")
-
- (set #CreateCpu "Creo l'eseguibile di EasyPatch\n ottimizzato per 68%s")
-
- (set #Wait "Attendere prego :-)\n")
-
- (set #Done "\nEasyPatch รจ stato installato con successo in\n %s.\n\n")
-
- (set #Aminet "Stai per installare la versione Aminet di EasyPatch.\nPotrai trovare la versione completa sulla homepage di EasyPatch.")
-
- (set #BootUp "Devo caricare EasyPatch automaticamente al bootup?")
-
- )
- )
-
-
- ;----------------------------------------------------------------------------
-
- ;/// Checking environment
- (set OS_ver (getversion "exec.library" (resident)))
- (if (< OS_ver (* 37 65536)) (abort #wrongOS))
-
-
- ;----------------------------------------------------------------------------
-
-
- (complete 0)
-
-
- (if (exists("SYS:Utilities/Say"))
- (
- (run (cat "Run <>NIL: SYS:Utilities/Say " #Voice))
- (set #vc 1)
- )
- )
-
- (message (#Welcome #ver))
-
-
-
-
- (if(exists("/AMINET-VERSION.txt"))
- (message #Aminet)
- )
-
-
- (complete 1)
-
-
- (set #EasyPatchDir
- (askdir
- (prompt #EasyPatchDir)
- (newpath)
- (default @default-dest)
- (help @askdir-help)
- )
- )
-
-
- (set #EasyIcon #EasyPatchDir)
- (set #EasyPatchDir (tackon #EasyPatchDir "EasyPatch"))
-
-
- (complete 10)
-
-
- (set #opt
- (askbool
- (prompt #BootUp)
- (default 1)
- (help @askoptions-help)
- )
- )
-
-
- (set #EasyGuideDir (tackon #EasyPatchDir "Docs"))
-
-
- (complete 20)
-
- ;(set #EasyGuideDir
- ; (askdir
- ; (prompt #GuideDir)
- ; (default #EasyGuideDir)
- ; (newpath)
- ; (help @askdir-help)
- ; )
- ;)
-
- (set #EasyGuideDir (tackon #EasyPatchDir "Docs"))
-
- (debug "Destination dir : " #EasyPatchDir)
- (debug "Destination guide dir: " #EasyGuideDir)
-
-
- (complete 25)
-
-
- (set #defcpu
-
- (database "cpu")
- )
-
- (set #cpun
- (substr #defcpu 3 1)
- )
-
-
- (if (= #cpun 0)
-
- (set #cpud 0)
- )
-
- (if (= #cpun 1)
-
- (set #cpud 0)
- )
-
- (if (= #cpun 2)
-
- (set #cpud 1)
- )
-
- (if (= #cpun 3)
-
- (set #cpud 2)
- )
-
- (if (= #cpun 4)
-
- (set #cpud 3)
- )
-
- (if (= #cpun 6)
-
- (set #cpud 4)
- )
-
- (complete 30)
-
-
-
- (set #CPU
-
- (askchoice
- (prompt #CpuChoice)
- (choices "68000" "68020" "68030" "68040" "68060")
- (default #cpud)
- (help @askchoice-help)
-
- )
- )
-
- (complete 40)
-
-
- (set #cpus (select #CPU "68000" "68020" "68030" "68040" "68060"))
-
- (debug "Processor : " #cpus)
-
-
- (set #cpup
- (substr #cpus 2 3
- )
- )
-
- (complete 50)
-
-
-
- (if (= #opt 1)
- (
- (set #EasyBoot "SYS:WBStartup")
-
- (complete 55)
-
- ;WBStartup+ Support
-
- (if (AND (>= iver 42) (>= irev 12))
- (
- (if(exists("SYS:WBStartup/WBStartup+"))
- (
- (iconinfo
- (prompt #Wait)
- (dest "SYS:WBStartup/WBStartup+")
- (gettooltype "ENABLEDPATH" "#EasyBoot")
- )
- (debug "Destination of EasyPatch: " #EasyBoot)
- )
- )
- )
- )
-
- (complete 60)
-
- (if(not(exists (tackon #EasyBoot "EasyPatch.info")))
- (
- (copyfiles
- (prompt #Wait)
- (source "/EasyPatch.info")
- (dest #EasyBoot)
- )
- )
- )
-
- (complete 65)
-
-
- (copyfiles
- (prompt #Wait)
- (source "/EasyPatch")
- (dest #EasyBoot)
- )
-
- (set #ins #EasyBoot)
- )
- ;else
- (
- (if(not(exists (tackon #EasyPatchDir "EasyPatch.info")))
- (
- (copyfiles
- (prompt #Wait)
- (source "/EasyPatch.info")
- (dest #EasyPatchDir)
- )
- )
- )
-
- (complete 55)
-
-
- (copyfiles
- (prompt #Wait)
- (source "/EasyPatch")
- (dest #EasyPatchDir)
- )
-
- (set #ins #EasyPatchDir)
-
- (complete 60)
-
- )
- )
-
-
- (complete 70)
-
-
- (if (<> cpup "000")
- (
- (if (= #vc 1)
- (run (cat "Run <>NIL: SYS:Utilities/Say " (cat #Voice_Upgrade " " #cpus ".")))
- )
-
- (working (#CreateCpu #cpup))
-
- (run ("spatch -oT:EasyPatch -p/Pch/EP%s.pch /EasyPatch" #cpup))
-
- (complete 75)
-
- (copyfiles
- (prompt #Wait)
- (source "T:EasyPatch")
- (dest #ins)
- )
-
- (delete "T:EasyPatch")
- )
- )
-
-
-
- (complete 80)
-
-
- (copyfiles
- (prompt #Wait)
- (source (cat "//EasyPatch" #nver ".info"))
- (newname "EasyPatch.info")
- (dest #EasyIcon)
- )
-
-
- (copyfiles
- (prompt #Wait)
- (source "/EasyList")
- (infos)
- (dest #EasyPatchDir)
- )
-
- (complete 83)
-
- (copyfiles
- (prompt #Wait)
- (source "/EasyStat")
- (infos)
- (dest #EasyPatchDir)
- )
-
- (complete 86)
-
- (copyfiles
- (prompt #Wait)
- (source "/Configuration/EasyConfig")
- (dest #EasyPatchDir)
- )
-
- (complete 89)
-
- (copyfiles
- (prompt #Wait)
- (source "/Configuration/Config")
- (dest #EasyPatchDir)
- )
-
- (complete 92)
-
- (copyfiles
- (prompt #Wait)
- (source (cat "/Configuration/" @language ".info"))
- (newname "EasyConfig.info")
- (dest #EasyPatchDir)
- )
-
- (tooltype
- (prompt #Wait)
- (dest "/EasyConfig")
- (noposition)
- )
-
- (complete 95)
-
-
- (copyfiles
- (prompt #Wait)
- (infos)
- (source "/Docs")
- (all)
- (dest #EasyGuideDir)
- )
-
- (copyfiles
- (prompt #Wait)
- (source "/Docs.info")
- (dest #EasyPatchDir)
- )
-
-
- (if (= #vc 1)
- (run (cat "Run <>NIL: SYS:Utilities/Say " #Voice_End))
- )
-
-
-
- (run "AmigaGuide /Docs/EasyPatch.guide")
-
- (complete 100)
-
-
- (set @default-dest #EasyPatchDir)
-
-
- ;(message (#Done #EasyPatchDir))
-
-
-
- (exit)
-
-
-